Unbreak eglot--setq-saving if symbol is unbound

* eglot.el (eglot--setq-saving): check if symbol is bound

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 0220969e6fd4daa5e44ce4dadc7ad3ba4a0d1569..bb5d5f816902ea8233a9ff9efe1f741bb0d2fd4b 100644 (file)
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -1173,9 +1173,10 @@ and just return it.  PROMPT shouldn't end with a question mark."
   "Bindings saved by `eglot--setq-saving'.")
 
 (defmacro eglot--setq-saving (symbol binding)
-  `(progn (push (cons ',symbol (symbol-value ',symbol))
-                eglot--saved-bindings)
-          (setq-local ,symbol ,binding)))
+  `(when (boundp ',symbol)
+     (push (cons ',symbol (symbol-value ',symbol))
+           eglot--saved-bindings)
+     (setq-local ,symbol ,binding)))
 
 (define-minor-mode eglot--managed-mode
   "Mode for source buffers managed by some EGLOT project."